← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Wed Dec 14 16:10:05 2022
Reported on Wed Dec 14 16:12:58 2022

Filename(eval 327)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
StatementsExecuted 73 statements in 788µs
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
6311851µs2.32msJSON::Schema::Modern::::_get_format_validation JSON::Schema::Modern::_get_format_validation
11111µs30µsJSON::Schema::Modern::::BEGIN@5.179 JSON::Schema::Modern::BEGIN@5.179
1114µs4µsMethod::Generate::Accessor::_Generated::::BEGIN@10.180Method::Generate::Accessor::_Generated::BEGIN@10.180
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1{
220s my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
311µs my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
4 package JSON::Schema::Modern;
5245µs249µs
# spent 30µs (11+19) within JSON::Schema::Modern::BEGIN@5.179 which was called: # once (11µs+19µs) by Sub::Quote::_clean_eval at line 5
no warnings 'closure';
# spent 30µs making 1 call to JSON::Schema::Modern::BEGIN@5.179 # spent 19µs making 1 call to warnings::unimport
6
# spent 2.32ms (851µs+1.47) within JSON::Schema::Modern::_get_format_validation which was called 63 times, avg 37µs/call: # 63 times (851µs+1.47ms) by JSON::Schema::Modern::Vocabulary::FormatAssertion::_eval_keyword_format at line 172 of JSON/Schema/Modern/Vocabulary/FormatAssertion.pm, avg 37µs/call
sub _get_format_validation {
7 ($_QUOTED,$_UNQUOTED) if 0;
8# BEGIN quote_sub PRELUDE
9package Method::Generate::Accessor::_Generated;
10
# spent 4µs within Method::Generate::Accessor::_Generated::BEGIN@10.180 which was called: # once (4µs+0s) by Sub::Quote::_clean_eval at line 15
BEGIN {
1111µs $^H = 2018;
1210s ${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
1312µs %^H = (
14 );
15140µs14µs}
16# END quote_sub PRELUDE
1763695µs1891.47msshift->_assert__format_validations->${\Data::Perl::Collection::Hash::MooseLike->can("get")}(@_); }
# spent 1.00ms making 63 calls to Data::Perl::Collection::Hash::MooseLike::get, avg 16µs/call # spent 290µs making 63 calls to JSON::Schema::Modern::_assert__format_validations, avg 5µs/call # spent 176µs making 63 calls to UNIVERSAL::can, avg 3µs/call
1810s $$_UNQUOTED = \&_get_format_validation;
19}
2014µs1;
21
22;